s 1   =   " R e d n n n " 
 
 P r i n t   " " 
 
 S e l e c t 1 
 
 s 1   =   " G r e e n n n " 
 
 S e l e c t 1 
 
 s 1   =   " B l u e n n n " 
 
 S e l e c t 1 
 
 S t o p 
 
 
 
 L a b e l   S e l e c t 1 
 
 	 S e l e c t   s 1 
 
 	 	 C a s e   " R e d " 
 
 	 	 	 B e e p   1 0 0 0   1 0 
 
 	 	 C a s e   " G r e e n " 
 
 	 	 	 B e e p   1 0 0 0   1 0 
 
 	 	 C a s e   " B l u e " 
 
 	 	 	 B e e p   1 0 0 0   1 0 
 
 	 	 ' C a s e E l s e 
 
 	 	 	 ' P r i n t   " I n v a l i d   Q R c o d e   "   +   s 1   +   C R L F 
 
 	 E n d S e l e c t 
 
 R e t u r n 
 
 
 
 L a b e l   S e l e c t 2 
 
 	 S e l e c t   s 2 
 
 	 	 C a s e   " R e d O N " 
 
 	 	 	 B e e p   1 0 0 0   1 0 
 
 	 	 C a s e E l s e 
 
 	 	 	 P r i n t   "   U n r e c o g n i z e d   c o m m a n d :   "   +   s 2   +   C R L F 
 
 	 	 	 B e e p 
 
 	 E n d S e l e c t 
 
 	 B e e p 
 
 	 W a i t   S e c o n d s   0 . 5 
 
 R e t u r n 
 
 
 
 
 
 ' W A T C H   t t s v o i c e s 
 
 